home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 05.zip / BS1 part 5 / PDraw3.0.adf / pdraw_rex.lzh / separate.rexx < prev    next >
OS/2 REXX Batch file  |  1992-06-15  |  277b  |  12 lines
  1. /*
  2.     Support function to separate each element in string with a given separator
  3. */
  4. parse arg string, delimiter, separator
  5.  
  6. if show(l, "gdarexxsupport.library") then
  7.     if ~addlib("gdarexxsupport.library", 0, -30) then
  8.         exit
  9.  
  10.  
  11. string = replacestring(string, delimiter, separator)
  12.